object FormCfgFwlProgramas: TFormCfgFwlProgramas Left = 316 Top = 180 BorderIcons = [biSystemMenu, biHelp] BorderStyle = bsSingle Caption = 'Configuraci�n de programas con acceso a la red' ClientHeight = 394 ClientWidth = 472 Color = 14609391 Constraints.MinHeight = 401 Constraints.MinWidth = 480 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} OldCreateOrder = False Position = poScreenCenter OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object PlaButtonCerrar: TPlaButton Left = 384 Top = 365 Width = 72 Height = 21 Anchors = [akRight, akBottom] Caption = 'Cerrar' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 1 OnClick = PlaButtonCerrarClick Cancel = True Default = True ModalResult = 2 end object PlaGroupBoxProgramas: TPlaGroupBox Left = 14 Top = 9 Width = 447 Height = 338 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = 13977088 TitleFont.Height = -11 TitleFont.Name = 'Tahoma' TitleFont.Style = [] Anchors = [akLeft, akTop, akRight, akBottom] Caption = 'Programas con acceso a la red' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 0 object ImageProgramas: TImage Left = 11 Top = 22 Width = 32 Height = 32 Picture.Data = {} Transparent = True end object Label1: TLabel Left = 58 Top = 19 Width = 336 Height = 13 Caption = 'Puedes establecer qu� programas pueden comunicarse usando la red' + '.' end object PlaListViewProgramas: TPlaListView Left = 58 Top = 45 Width = 377 Height = 203 Anchors = [akLeft, akTop, akRight, akBottom] Color = clWhite CheckBoxes = False Columns = < item Width = 250 Caption = 'Programa' end item Editable = True Width = 110 Caption = 'Comunicaci�n' DropDownList.Strings = ( 'Denegada' 'Permitida' 'Preguntar') end> DragCursor = crDrag DragMode = dmManual Editable = True Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] HideSelection = False ImageList = ImageListProgIcons MultiSelect = False ParentColor = False ParentFont = False ParentShowHint = False ShowHint = True ShowColumnHeaders = True TabOrder = 0 OnEdited = PlaListViewProgramasEdited OnGetHintInfo = PlaListViewProgramasGetHintInfo OnSelectItem = PlaListViewProgramasSelectItem Data = {000100000000FE} end object PlaButtonAnadir: TPlaButton Left = 89 Top = 280 Width = 110 Height = 21 HelpContext = 226 Anchors = [akRight, akBottom] Caption = 'A�adir programa' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 1 OnClick = PlaButtonAnadirClick end object PlaButtonEditar: TPlaButton Left = 207 Top = 280 Width = 110 Height = 21 HelpContext = 227 Anchors = [akRight, akBottom] Caption = 'Opciones avanzadas' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 2 OnClick = PlaButtonEditarClick end object PlaButtonQuitar: TPlaButton Left = 325 Top = 280 Width = 110 Height = 21 HelpContext = 228 Anchors = [akRight, akBottom] Caption = 'Quitar programa' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 3 OnClick = PlaButtonQuitarClick end object PlaCheckBoxMostrar: TPlaCheckBox Left = 58 Top = 255 Width = 221 Height = 16 HelpContext = 225 Anchors = [akLeft, akBottom] Caption = 'Mostrar programas del sistema operativo.' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 4 OnClick = PlaCheckBoxMostrarClick State = cbChecked end object PlaCheckBoxReportar: TPlaCheckBox Left = 58 Top = 310 Width = 333 Height = 16 HelpContext = 229 Anchors = [akLeft, akBottom] Caption = 'Reflejar en el informe cada vez que se deniegue la comunicaci�n.' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 5 OnClick = PlaCheckBoxMostrarClick State = cbChecked end end object ImageListProgIcons: TImageList BlendColor = clWhite BkColor = clWhite Masked = False Top = 366 end end